﻿<%
Dim conn
Set conn=Server.CreateObject("ADODB.Connection") 
conn.Open "DRIVER={mysql odbc 5.1 driver}; SERVER=localhost; DATABASE=card_test; USER=root; PASSWORD=duron900;OPTION=3;"
'conn.Open "Provider=SQLOLEDB;Data Source=(local);Initial Catalog=card_test;User Id=sa;Password=duron900;"

'conn.execute("Set names gbk")
%>